inherited FCadastroSolitacao: TFCadastroSolitacao
  Left = 231
  Top = 122
  Caption = 'Cadastro Solicita'#231#227'o'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  inherited pcCadastro: TPageControl
    ActivePage = TsCadastro
    TabIndex = 1
    inherited TsPesquisa: TTabSheet
      inherited dbgPesquisaPadra: TDBGrid
        Columns = <
          item
            Expanded = False
            FieldName = 'SOL_CODIGO'
            Title.Alignment = taCenter
            Width = 70
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'SOL_DATA'
            Title.Alignment = taCenter
            Width = 93
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'SOL_SOLICITANTE_DESC'
            Width = 400
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'SOL_SITUACAO'
            Title.Alignment = taCenter
            Title.Caption = 'Sit.'
            Width = 40
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'SOL_TIPO'
            Title.Alignment = taCenter
            Width = 40
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'SOL_VALIDACAO'
            Title.Alignment = taCenter
            Title.Caption = 'Aut.'
            Width = 40
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'SOL_ORIGEM'
            Title.Alignment = taCenter
            Width = 50
            Visible = True
          end>
      end
    end
    inherited TsCadastro: TTabSheet
      OnShow = TsCadastroShow
      inherited panel1: TPanel
        Ctl3D = False
        ParentCtl3D = False
        inherited panel2: TPanel
          TabOrder = 2
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
          end
          object BtnImprimir: TBitBtn
            Left = 311
            Top = 5
            Width = 100
            Height = 25
            Caption = 'Emitir'
            TabOrder = 6
            OnClick = BtnImprimirClick
            Glyph.Data = {
              66010000424D6601000000000000760000002800000014000000140000000100
              040000000000F000000000000000000000001000000010000000000000000000
              8000008000000080800080000000800080008080000080808000C0C0C0000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
              DDDDDDDD0000DDDDDDDDDDDDDDDDDDDD0000DD000DDDDDDDDDD000DD0000D000
              000000000000000D0000D0F8888888888888880D0000D0F8888888888888880D
              0000D0F8888888822899880D0000D0FFFFFFFFFFFFFFFF0D0000D70077777777
              7777007D0000DDD00000000000000DDD0000DDD00FFFFFFFFFF00DDD0000DDDD
              0F00000000F0DDDD0000DDDD0FFFFFFFFFF0DDDD0000DDDD0F00000000F0DDDD
              0000DDDD0FFFFFFFFFF0DDDD0000DDDD0F00FFFFFFF0DDDD0000DDDD0FFFFFFF
              FFF0DDDD0000DDDD000000000000DDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDD
              DDDDDDDDDDDDDDDD0000}
          end
        end
        inherited panel3: TPanel
          TabOrder = 1
          object btnCancelarSolicitacao: TBitBtn
            Left = 164
            Top = 5
            Width = 157
            Height = 25
            Caption = 'Cancela Solicita'#231#227'o'
            TabOrder = 5
            OnClick = btnCancelarSolicitacaoClick
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000130B0000130B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
              3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
              33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
              993337777F777F3377F3393999707333993337F77737333337FF993399933333
              399377F3777FF333377F993339903333399377F33737FF33377F993333707333
              399377F333377FF3377F993333101933399377F333777FFF377F993333000993
              399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
              99333773FF777F777733339993707339933333773FF7FFF77333333999999999
              3333333777333777333333333999993333333333377777333333}
            NumGlyphs = 2
          end
          object btnEncerrar: TBitBtn
            Left = 4
            Top = 29
            Width = 157
            Height = 25
            Caption = 'Encerra Solicita'#231#227'o'
            TabOrder = 4
            OnClick = btnEncerrarClick
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000120B0000120B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000003
              333333333F777773FF333333008888800333333377333F3773F3333077870787
              7033333733337F33373F3308888707888803337F33337F33337F330777880887
              7703337F33337FF3337F3308888000888803337F333777F3337F330777700077
              7703337F33377733337F33088888888888033373FFFFFFFFFF73333000000000
              00333337777777777733333308033308033333337F7F337F7F33333308033308
              033333337F7F337F7F33333308033308033333337F73FF737F33333377800087
              7333333373F77733733333333088888033333333373FFFF73333333333000003
              3333333333777773333333333333333333333333333333333333}
            NumGlyphs = 2
          end
          object btnDescancelar: TBitBtn
            Left = 4
            Top = 5
            Width = 157
            Height = 25
            Caption = 'Ativa Solicita'#231#227'o'
            TabOrder = 6
            OnClick = btnDescancelarClick
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000130B0000130B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
              3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
              3333333777333777FF33339993707399933333773337F3777FF3399933000339
              9933377333777F3377F3399333707333993337733337333337FF993333333333
              399377F33333F333377F993333303333399377F33337FF333373993333707333
              333377F333777F333333993333101333333377F333777F3FFFFF993333000399
              999377FF33777F77777F3993330003399993373FF3777F37777F399933000333
              99933773FF777F3F777F339993707399999333773F373F77777F333999999999
              3393333777333777337333333999993333333333377777333333}
            NumGlyphs = 2
          end
          object btnAutorizar: TBitBtn
            Left = 164
            Top = 31
            Width = 157
            Height = 25
            Caption = 'Autorizar Solicita'#231#227'o'
            TabOrder = 7
            OnClick = btnAutorizarClick
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000120B0000120B00001000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
              555555555555555555555555555555555555555555FF55555555555559055555
              55555555577FF5555555555599905555555555557777F5555555555599905555
              555555557777FF5555555559999905555555555777777F555555559999990555
              5555557777777FF5555557990599905555555777757777F55555790555599055
              55557775555777FF5555555555599905555555555557777F5555555555559905
              555555555555777FF5555555555559905555555555555777FF55555555555579
              05555555555555777FF5555555555557905555555555555777FF555555555555
              5990555555555555577755555555555555555555555555555555}
            NumGlyphs = 2
          end
        end
        object PageControl1: TPageControl
          Left = 1
          Top = 36
          Width = 842
          Height = 389
          ActivePage = TabSheet1
          Align = alClient
          TabIndex = 0
          TabOrder = 0
          object TabSheet1: TTabSheet
            Caption = 'Cabe'#231'alho'
            object Label1: TLabel
              Left = 8
              Top = 16
              Width = 40
              Height = 16
              Caption = 'C'#243'digo'
            end
            object Label2: TLabel
              Left = 72
              Top = 16
              Width = 27
              Height = 16
              Caption = 'Data'
            end
            object Label3: TLabel
              Left = 8
              Top = 131
              Width = 88
              Height = 16
              Caption = 'Solicitante (F8)'
            end
            object Label18: TLabel
              Left = 8
              Top = 179
              Width = 94
              Height = 16
              Caption = 'Centro de Custo'
            end
            object Label4: TLabel
              Left = 8
              Top = 227
              Width = 123
              Height = 16
              Caption = 'Motivo da Solicita'#231#227'o'
            end
            object DBText8: TDBText
              Left = 8
              Top = 195
              Width = 409
              Height = 17
              DataField = 'SOL_CENTROCUSTO_DESC'
              DataSource = dsCadastro
            end
            object edCodigo: TDBEdit
              Left = 8
              Top = 32
              Width = 57
              Height = 22
              DataField = 'SOL_CODIGO'
              DataSource = dsCadastro
              ReadOnly = True
              TabOrder = 0
            end
            object DBDateEdit1: TDBDateEdit
              Left = 72
              Top = 32
              Width = 90
              Height = 22
              DataField = 'SOL_DATA'
              DataSource = dsCadastro
              ReadOnly = True
              ButtonWidth = 0
              NumGlyphs = 2
              TabOrder = 1
            end
            object dblSolicitante: TDBLookupComboBox
              Left = 8
              Top = 147
              Width = 409
              Height = 22
              DataField = 'SOL_SOLICITANTE'
              DataSource = dsCadastro
              KeyField = 'SOLI_CODIGO'
              ListField = 'SOLI_NOME'
              ListSource = dsSolicitante
              TabOrder = 2
              OnExit = dblSolicitanteExit
              OnKeyDown = dblSolicitanteKeyDown
            end
            object dblMotivo: TDBLookupComboBox
              Left = 8
              Top = 243
              Width = 409
              Height = 22
              DataField = 'SOL_MOTIVO'
              DataSource = dsCadastro
              KeyField = 'MOTI_CODIGO'
              ListField = 'MOTI_DESCRICAO'
              ListSource = dsMotivo
              TabOrder = 3
              OnKeyDown = dblSolicitanteKeyDown
            end
            object GroupBox1: TGroupBox
              Left = 280
              Top = 275
              Width = 136
              Height = 68
              Caption = '  Ranking  '
              TabOrder = 5
              object Label9: TLabel
                Left = 16
                Top = 17
                Width = 18
                Height = 16
                Caption = 'N'#186':'
              end
              object Label10: TLabel
                Left = 16
                Top = 33
                Width = 31
                Height = 16
                Caption = 'Data:'
              end
              object DBText1: TDBText
                Left = 40
                Top = 17
                Width = 65
                Height = 17
                DataField = 'RANK_SOLICITACAO'
                DataSource = dsRanking
              end
              object Label5: TLabel
                Left = 16
                Top = 49
                Width = 31
                Height = 16
                Caption = 'Hora:'
              end
              object lbDataRank: TLabel
                Left = 49
                Top = 33
                Width = 81
                Height = 16
                AutoSize = False
                Caption = 'lbDataRank'
              end
              object lbHoraRank: TLabel
                Left = 49
                Top = 49
                Width = 81
                Height = 16
                AutoSize = False
                Caption = 'lbHoraRank'
              end
            end
            object rgTipo: TDBRadioGroup
              Tag = 2
              Left = 8
              Top = 275
              Width = 130
              Height = 68
              Caption = '  Tipo  '
              DataField = 'SOL_TIPO'
              DataSource = dsCadastro
              Items.Strings = (
                'Convencional'
                'Emerg'#234'ncial')
              TabOrder = 4
              Values.Strings = (
                'C'
                'E')
              OnExit = rgTipoExit
            end
            object GroupBox3: TGroupBox
              Left = 174
              Top = 15
              Width = 105
              Height = 40
              Caption = '  Situa'#231#227'o  '
              TabOrder = 6
              object LbSituacao: TLabel
                Left = 3
                Top = 18
                Width = 99
                Height = 16
                Alignment = taCenter
                AutoSize = False
                Caption = 'Cancelada'
              end
            end
            object GroupBox4: TGroupBox
              Left = 8
              Top = 59
              Width = 407
              Height = 65
              Caption = '  Autoriza'#231#227'o  '
              TabOrder = 7
              object LbAutorizacao: TLabel
                Left = 10
                Top = 18
                Width = 120
                Height = 16
                AutoSize = False
                Caption = 'Nao Autorizada'
              end
              object Lbnomeautorizante: TLabel
                Left = 10
                Top = 41
                Width = 299
                Height = 16
                AutoSize = False
              end
              object LbDataAutorizacao: TLabel
                Left = 264
                Top = 18
                Width = 129
                Height = 16
                Alignment = taRightJustify
                AutoSize = False
              end
            end
            object GroupBox5: TGroupBox
              Left = 143
              Top = 275
              Width = 132
              Height = 68
              BiDiMode = bdLeftToRight
              Caption = '  Origem  '
              ParentBiDiMode = False
              TabOrder = 8
              object LbOrigem: TLabel
                Left = 16
                Top = 18
                Width = 105
                Height = 16
                AutoSize = False
              end
            end
          end
          object TabSheet2: TTabSheet
            Caption = 'Itens'
            ImageIndex = 1
            object Panel4: TPanel
              Left = 0
              Top = 0
              Width = 834
              Height = 33
              Align = alTop
              TabOrder = 0
              object BitInseriItem: TBitBtn
                Tag = 10
                Left = 3
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Incluir'
                TabOrder = 0
                OnClick = BitInseriItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000130B0000130B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
                  333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
                  0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
                  07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
                  07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
                  0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
                  33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
                  B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
                  3BB33773333773333773B333333B3333333B7333333733333337}
                NumGlyphs = 2
              end
              object BitEditarItem: TBitBtn
                Tag = 10
                Left = 90
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Editar'
                TabOrder = 1
                OnClick = BitEditarItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000120B0000120B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
                  000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
                  00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
                  F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
                  0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
                  FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
                  FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
                  0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
                  00333377737FFFFF773333303300000003333337337777777333}
                NumGlyphs = 2
              end
              object BitExcluirItem: TBitBtn
                Tag = 10
                Left = 177
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Excluir'
                TabOrder = 2
                OnClick = BitExcluirItemClick
                Glyph.Data = {
                  B2050000424DB205000000000000360400002800000012000000130000000100
                  0800000000007C010000C30E0000C30E00000001000000000000000000007B00
                  0000BD000000FF0000007B7B000000FF0000FFFF000000315A0008427300084A
                  730000007B007B007B00084A7B0008527B0021527B00007B7B007B7B7B00004A
                  840008528400105284002963840008528C00085A8C00185A8C0018638C002963
                  8C0008529400185A9400296B9400316B94002973940031739400085A9C001863
                  9C0018739C0029739C0031739C0031849C00005AA5002173A5003973A500297B
                  A500186BAD00106BB500317BB5002984B5004A8CB500086BBD000073BD001073
                  BD001873BD00217BBD004284BD00318CBD004A8CBD005294BD005A9CBD00BDBD
                  BD001073C600007BC600217BC600428CC6004A8CC6005A9CC6000084CE000884
                  CE00398CCE005A9CCE00639CCE001884D6002184D600088CD600108CD6004294
                  D600399CD6004A9CD600529CD6005A9CD6005AA5D60063ADD6001884DE002184
                  DE00188CDE001094DE001894DE003194DE00299CDE004AA5DE005AA5DE004AB5
                  DE00189CE700219CE700429CE7005AA5E7005AADE70063ADE7006BB5E70021A5
                  EF0029A5EF0031A5EF0063B5EF006BBDEF0029ADF70031ADF7006BBDF7000000
                  FF00FF00FF0031B5FF0039B5FF0042B5FF0039BDFF0042BDFF0042C6FF004AC6
                  FF006BC6FF004ACEFF0052CEFF0052D6FF005ADEFF0063E7FF0000FFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                  FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00393939393939
                  3939393939393939393939690000396939393939393939393939393939396939
                  0000396969393910101010101010101010693939000039696969000000000000
                  0000000069693939000039396969007879797978797979696939393900003939
                  3969697903030303030379691039393900003939396969697978797979786969
                  1039393900003939393969696903030369696900103939390000393939390069
                  6969797869697900103939390000393939390079036969696903790010393939
                  0000393939390079796969696978790010393939000039393939007903696969
                  6900000010393939000039393939007869697900696979001039393900003939
                  3939006969697900696969693939393900003939396969697978790079003969
                  6939393900003969696969000000000000393939696939390000396969693939
                  3939393939393939393969390000393939393939393939393939393939393969
                  00003939393939393939393939393939393939390000}
              end
              object DBNitens: TDBNavigator
                Tag = 11
                Left = 728
                Top = 5
                Width = 80
                Height = 23
                DataSource = dsItensSolicitacao
                VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
                TabOrder = 3
              end
              object stItens: TStaticText
                Left = 603
                Top = 9
                Width = 117
                Height = 20
                Alignment = taRightJustify
                Caption = ' Reg: 10000/10000 '
                TabOrder = 4
              end
            end
            object Panel5: TPanel
              Left = 0
              Top = 33
              Width = 834
              Height = 112
              Align = alTop
              TabOrder = 1
              object Label66: TLabel
                Left = 3
                Top = 7
                Width = 67
                Height = 16
                Caption = 'C'#243'digo (F8)'
                Font.Charset = ANSI_CHARSET
                Font.Color = clBlack
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = []
                ParentFont = False
              end
              object Label24: TLabel
                Left = 80
                Top = 7
                Width = 81
                Height = 16
                Caption = 'Descri'#231#227'o(F8)'
                Font.Charset = ANSI_CHARSET
                Font.Color = clBlack
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = []
                ParentFont = False
              end
              object Label6: TLabel
                Left = 3
                Top = 54
                Width = 68
                Height = 16
                Caption = 'Observa'#231#227'o'
              end
              object Label35: TLabel
                Left = 501
                Top = 6
                Width = 66
                Height = 16
                Caption = 'Quantidade'
              end
              object Label7: TLabel
                Left = 501
                Top = 54
                Width = 47
                Height = 16
                Caption = 'Unidade'
                Font.Charset = ANSI_CHARSET
                Font.Color = clBlack
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = []
                ParentFont = False
              end
              object EdCodProdutoMercadoria: TEdit
                Tag = 10
                Left = 3
                Top = 23
                Width = 71
                Height = 22
                Ctl3D = False
                Font.Charset = ANSI_CHARSET
                Font.Color = clBlack
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = []
                ParentCtl3D = False
                ParentFont = False
                TabOrder = 0
                OnExit = EdCodProdutoMercadoriaExit
                OnKeyDown = EdCodProdutoMercadoriaKeyDown
              end
              object DBLCBProdutoMercadoria: TDBLookupComboBox
                Tag = 10
                Left = 80
                Top = 23
                Width = 417
                Height = 22
                Hint = '(F3) Visualizar Descri'#231#227'o - (F7) Todos - (F8) Cliente'
                Ctl3D = False
                DataField = 'ITENSSOL_PRODCODIGO'
                DataSource = dsItensSolicitacao
                Font.Charset = ANSI_CHARSET
                Font.Color = clBlack
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = []
                KeyField = 'PROD_CODIGO'
                ListField = 'PROD_DESCRICAOENT'
                ListSource = dsProduto
                ParentCtl3D = False
                ParentFont = False
                ParentShowHint = False
                ShowHint = True
                TabOrder = 1
                OnExit = DBLCBProdutoMercadoriaExit
                OnKeyDown = DBLCBProdutoMercadoriaKeyDown
              end
              object edObservacao: TDBEdit
                Left = 3
                Top = 71
                Width = 494
                Height = 22
                DataField = 'ITENSSOL_OBS'
                DataSource = dsItensSolicitacao
                TabOrder = 3
              end
              object RxDBCQtd: TRxDBCalcEdit
                Tag = 10
                Left = 501
                Top = 23
                Width = 71
                Height = 22
                DataField = 'FITENSSOL_QTD'
                DataSource = dsItensSolicitacao
                Alignment = taCenter
                Ctl3D = False
                DecimalPlaces = 5
                DisplayFormat = '0.,####'
                ButtonWidth = 0
                NumGlyphs = 2
                ParentCtl3D = False
                TabOrder = 2
              end
              object DBEdit1: TDBEdit
                Left = 501
                Top = 71
                Width = 71
                Height = 22
                TabStop = False
                DataField = 'PROD_UNIDSAIDA'
                DataSource = dsProduto
                ReadOnly = True
                TabOrder = 4
              end
              object GroupBox2: TGroupBox
                Left = 576
                Top = 8
                Width = 254
                Height = 85
                Caption = '  Pedido  '
                TabOrder = 5
                object Label11: TLabel
                  Left = 8
                  Top = 16
                  Width = 45
                  Height = 16
                  Caption = 'N'#250'mero'
                end
                object DBText3: TDBText
                  Left = 8
                  Top = 32
                  Width = 52
                  Height = 17
                  DataField = 'PED_CODIGO'
                  DataSource = dsPedido
                end
                object DBText4: TDBText
                  Left = 64
                  Top = 32
                  Width = 65
                  Height = 17
                  Alignment = taCenter
                  DataField = 'PED_DATA'
                  DataSource = dsPedido
                end
                object Label12: TLabel
                  Left = 64
                  Top = 16
                  Width = 27
                  Height = 16
                  Alignment = taCenter
                  Caption = 'Data'
                end
                object DBText5: TDBText
                  Left = 128
                  Top = 32
                  Width = 62
                  Height = 17
                  Alignment = taCenter
                  DataField = 'ITENS_PED_QUANTIDADE'
                  DataSource = dsPedido
                end
                object DBText6: TDBText
                  Left = 191
                  Top = 32
                  Width = 60
                  Height = 17
                  Alignment = taCenter
                  DataField = 'ITENS_PED_QUANTIDADEATEN'
                  DataSource = dsPedido
                end
                object Label13: TLabel
                  Left = 128
                  Top = 16
                  Width = 62
                  Height = 16
                  Alignment = taCenter
                  AutoSize = False
                  Caption = 'Qtd. Ped.'
                end
                object Label14: TLabel
                  Left = 191
                  Top = 16
                  Width = 46
                  Height = 16
                  Alignment = taCenter
                  Caption = 'Qtd. At.'
                end
                object Label15: TLabel
                  Left = 7
                  Top = 56
                  Width = 53
                  Height = 16
                  AutoSize = False
                  Caption = 'Situa'#231#227'o:'
                end
                object lbSituacaiItem: TLabel
                  Left = 64
                  Top = 56
                  Width = 145
                  Height = 16
                  AutoSize = False
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clWindowText
                  Font.Height = -13
                  Font.Name = 'Arial'
                  Font.Style = []
                  ParentFont = False
                end
              end
            end
            object Panel6: TPanel
              Left = 0
              Top = 145
              Width = 834
              Height = 33
              Align = alTop
              TabOrder = 2
              object BitSalvarItem: TBitBtn
                Tag = 10
                Left = 656
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Salvar'
                TabOrder = 0
                OnClick = BitSalvarItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000130B0000130B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
                  7700333333337777777733333333008088003333333377F73377333333330088
                  88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
                  000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
                  FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
                  99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
                  99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
                  99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
                  93337FFFF7737777733300000033333333337777773333333333}
                NumGlyphs = 2
              end
              object BitCancelarItem: TBitBtn
                Tag = 10
                Left = 742
                Top = 5
                Width = 80
                Height = 23
                Caption = '&Cancelar'
                TabOrder = 1
                OnClick = BitCancelarItemClick
                Glyph.Data = {
                  76010000424D7601000000000000760000002800000020000000100000000100
                  04000000000000010000130B0000130B00001000000000000000000000000000
                  800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                  FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
                  3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
                  33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
                  993337777F777F3377F3393999707333993337F77737333337FF993399933333
                  399377F3777FF333377F993339903333399377F33737FF33377F993333707333
                  399377F333377FF3377F993333101933399377F333777FFF377F993333000993
                  399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
                  99333773FF777F777733339993707339933333773FF7FFF77333333999999999
                  3333333777333777333333333999993333333333377777333333}
                NumGlyphs = 2
              end
            end
            object DBGrid1: TDBGrid
              Tag = 3
              Left = 0
              Top = 178
              Width = 834
              Height = 180
              Hint = 'Precione Ctrl+F para localizar um produto'
              Align = alClient
              DataSource = dsItensSolicitacao
              Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
              ParentShowHint = False
              PopupMenu = PopupMenu2
              ShowHint = True
              TabOrder = 3
              TitleFont.Charset = ANSI_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -13
              TitleFont.Name = 'Arial'
              TitleFont.Style = []
              Columns = <
                item
                  Expanded = False
                  FieldName = 'ITENSSOL_PRODCODIGO'
                  Width = 80
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'ITENSSOL_PROD_DESC'
                  Title.Caption = 'Descri'#231#227'o'
                  Width = 440
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'FITENSSOL_QTD'
                  Width = 100
                  Visible = True
                end>
            end
          end
        end
      end
    end
  end
  inherited PopupMenu1: TPopupMenu
    Left = 728
    Top = 256
  end
  inherited dsCadastro: TDataSource
    Left = 528
    Top = 296
  end
  inherited QCadastro: TQuery
    SQL.Strings = (
      'SELECT '
      '  SOLICITACAO.SOL_CODIGO,'
      '  SOLICITACAO.SOL_DATA,'
      '  SOLICITACAO.SOL_SOLICITANTE,'
      '  SOLICITACAO.SOL_SOLICITANTE_DESC,'
      '  SOLICITACAO.SOL_CENTROCUSTO,'
      '  SOLICITACAO.SOL_CENTROCUSTO_DESC,'
      '  SOLICITACAO.SOL_MOTIVO,'
      '  SOLICITACAO.SOL_MOTIVO_DESC,'
      '  SOLICITACAO.SOL_TIPO,'
      '  SOLICITACAO.SOL_ORIGEM,'
      '  SOLICITACAO.SOL_SITUACAO,'
      '  SOLICITACAO.SOL_VALIDACAO,'
      '  SOLICITACAO.USUARIO_CADASTRO,'
      '  SOLICITACAO.USUARIO_AUTERACAO,'
      '  SOLICITACAO.USUARIO_EXCLUSAO,'
      '  SOLICITACAO.DATA_CADASTRO,'
      '  SOLICITACAO.DATA_EXCLUSAO,'
      '  SOLICITACAO.DATA_AUTERACAO,'
      '  SOLICITACAO.SOL_AUTORIZANTE,'
      '  SOLICITACAO.SOL_DATA_AUTORIZACAO,'
      '  SOLICITACAO.EXCLUIDO'
      'FROM'
      '  SOLICITACAO')
    Left = 528
    Top = 336
  end
  inherited dspCadastro: TDataSetProvider
    Left = 528
    Top = 376
  end
  inherited cdsCadastro: TClientDataSet
    IndexFieldNames = 'SOL_CODIGO'
    BeforePost = cdsCadastroBeforePost
    Left = 528
    Top = 416
    object cdsCadastroSOL_CODIGO: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'C'#243'digo'
      FieldName = 'SOL_CODIGO'
    end
    object cdsCadastroSOL_DATA: TDateTimeField
      Alignment = taCenter
      DisplayLabel = 'Data'
      FieldName = 'SOL_DATA'
      DisplayFormat = 'dd/mm/yyyy'
    end
    object cdsCadastroSOL_SOLICITANTE: TIntegerField
      DisplayLabel = 'Solicitante'
      FieldName = 'SOL_SOLICITANTE'
    end
    object cdsCadastroSOL_CENTROCUSTO: TIntegerField
      DisplayLabel = 'Centro de Custo'
      FieldName = 'SOL_CENTROCUSTO'
    end
    object cdsCadastroSOL_MOTIVO: TIntegerField
      DisplayLabel = 'Motivo'
      FieldName = 'SOL_MOTIVO'
    end
    object cdsCadastroSOL_TIPO: TStringField
      Alignment = taCenter
      DisplayLabel = 'Tipo'
      DisplayWidth = 20
      FieldName = 'SOL_TIPO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroSOL_ORIGEM: TStringField
      Alignment = taCenter
      DisplayLabel = 'Origem'
      DisplayWidth = 20
      FieldName = 'SOL_ORIGEM'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsCadastroDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsCadastroDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsCadastroEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroSOL_SOLICITANTE_DESC: TStringField
      DisplayLabel = 'Solicitante'
      FieldName = 'SOL_SOLICITANTE_DESC'
      Size = 40
    end
    object cdsCadastroSOL_CENTROCUSTO_DESC: TStringField
      DisplayLabel = 'Centro de Custo'
      FieldName = 'SOL_CENTROCUSTO_DESC'
      Size = 60
    end
    object cdsCadastroSOL_MOTIVO_DESC: TStringField
      DisplayLabel = 'Motivo'
      FieldName = 'SOL_MOTIVO_DESC'
      Size = 40
    end
    object cdsCadastroSOL_SITUACAO: TStringField
      Alignment = taCenter
      DisplayLabel = 'Situa'#231#227'o'
      FieldName = 'SOL_SITUACAO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroSOL_VALIDACAO: TStringField
      Alignment = taCenter
      DisplayLabel = 'Autoriza'#231#227'o'
      FieldName = 'SOL_VALIDACAO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsCadastroUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsCadastroUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsCadastroSOL_AUTORIZANTE: TStringField
      FieldName = 'SOL_AUTORIZANTE'
    end
    object cdsCadastroSOL_DATA_AUTORIZACAO: TDateTimeField
      FieldName = 'SOL_DATA_AUTORIZACAO'
    end
  end
  inherited dsCamposPesquisa: TDataSource
    Left = 808
    Top = 264
  end
  inherited OpenDialog1: TOpenDialog
    Left = 65520
    Top = 65528
  end
  object dsSolicitante: TDataSource
    DataSet = DMGestao.QSolicitante
    Left = 808
    Top = 296
  end
  object dsCentroCusto: TDataSource
    DataSet = DMFinanceiro.QCentro
    Left = 808
    Top = 328
  end
  object dsMotivo: TDataSource
    DataSet = DMGestao.QMotivoSolicitacao
    Left = 808
    Top = 360
  end
  object cdsItensSolicitacao: TClientDataSet
    Aggregates = <>
    IndexFieldNames = 'ITENSSOL_SOL_CODIGO'
    MasterFields = 'SOL_CODIGO'
    MasterSource = dsCadastro
    PacketRecords = 0
    Params = <>
    ProviderName = 'dspItensSolicitacao'
    BeforePost = cdsItensSolicitacaoBeforePost
    Left = 560
    Top = 416
    object cdsItensSolicitacaoITENSSOL_PRODCODIGO: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'C'#243'digo'
      FieldName = 'ITENSSOL_PRODCODIGO'
    end
    object cdsItensSolicitacaoFITENSSOL_QTD: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'Quantidade'
      DisplayWidth = 100
      FieldName = 'FITENSSOL_QTD'
    end
    object cdsItensSolicitacaoITENSSOL_OBS: TStringField
      DisplayLabel = 'Observa'#231#227'o'
      FieldName = 'ITENSSOL_OBS'
      Size = 100
    end
    object cdsItensSolicitacaoITENSSOL_PEDCODIGO: TIntegerField
      Alignment = taLeftJustify
      DisplayLabel = 'Pedido'
      FieldName = 'ITENSSOL_PEDCODIGO'
    end
    object cdsItensSolicitacaoITENSSOL_QTDPEDIDO: TIntegerField
      Alignment = taCenter
      DisplayLabel = 'QTD Pedido'
      FieldName = 'ITENSSOL_QTDPEDIDO'
    end
    object cdsItensSolicitacaoITENSSOL_CODIGO: TIntegerField
      FieldName = 'ITENSSOL_CODIGO'
    end
    object cdsItensSolicitacaoITENSSOL_SOL_CODIGO: TIntegerField
      FieldName = 'ITENSSOL_SOL_CODIGO'
    end
    object cdsItensSolicitacaoUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsItensSolicitacaoUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsItensSolicitacaoUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsItensSolicitacaoDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsItensSolicitacaoDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsItensSolicitacaoDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsItensSolicitacaoEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object cdsItensSolicitacaoITENSSOL_PROD_DESC: TStringField
      DisplayLabel = 'Produto'
      FieldName = 'ITENSSOL_PROD_DESC'
      Size = 60
    end
  end
  object dspItensSolicitacao: TDataSetProvider
    DataSet = QItensSolicitacao
    Constraints = True
    Left = 560
    Top = 376
  end
  object dsItensSolicitacao: TDataSource
    AutoEdit = False
    DataSet = cdsItensSolicitacao
    OnStateChange = dsItensSolicitacaoStateChange
    OnDataChange = dsItensSolicitacaoDataChange
    Left = 560
    Top = 296
  end
  object QItensSolicitacao: TQuery
    DatabaseName = 'base'
    DataSource = dsCadastro
    SQL.Strings = (
      'SELECT '
      '  ITENSSOLICITACAO.ITENSSOL_CODIGO,'
      '  ITENSSOLICITACAO.ITENSSOL_SOL_CODIGO,'
      '  ITENSSOLICITACAO.ITENSSOL_PRODCODIGO,'
      '  ITENSSOLICITACAO.FITENSSOL_QTD,'
      '  ITENSSOLICITACAO.ITENSSOL_PEDCODIGO,'
      '  ITENSSOLICITACAO.ITENSSOL_QTDPEDIDO,'
      '  ITENSSOLICITACAO.ITENSSOL_OBS,'
      '  ITENSSOLICITACAO.USUARIO_CADASTRO,'
      '  ITENSSOLICITACAO.USUARIO_AUTERACAO,'
      '  ITENSSOLICITACAO.USUARIO_EXCLUSAO,'
      '  ITENSSOLICITACAO.DATA_CADASTRO,'
      '  ITENSSOLICITACAO.DATA_EXCLUSAO,'
      '  ITENSSOLICITACAO.DATA_AUTERACAO,'
      '  ITENSSOLICITACAO.EXCLUIDO,'
      '  ITENSSOLICITACAO.ITENSSOL_PROD_DESC'
      'FROM'
      '  ITENSSOLICITACAO'
      'WHERE'
      '  ITENSSOLICITACAO.ITENSSOL_SOL_CODIGO = :SOL_CODIGO'
      '  ')
    Left = 560
    Top = 336
    ParamData = <
      item
        DataType = ftInteger
        Name = 'ITENSSOL_SOL_CODIGO'
        ParamType = ptUnknown
        Value = 8
      end>
  end
  object dsProduto: TDataSource
    DataSet = DMGestao.QProdutoEnt
    Left = 808
    Top = 391
  end
  object dsRanking: TDataSource
    Left = 592
    Top = 296
  end
  object QRanking: TQuery
    DatabaseName = 'base'
    Left = 688
    Top = 312
  end
  object QPedido: TQuery
    DatabaseName = 'base'
    Left = 688
    Top = 344
    object IntegerField1: TIntegerField
      FieldName = 'PED_CODIGO'
      Origin = 'BASE.PEDIDO.PED_CODIGO'
      DisplayFormat = '000000'
    end
    object DateTimeField1: TDateTimeField
      FieldName = 'PED_DATA'
      Origin = 'BASE.PEDIDO.PED_DATA'
      DisplayFormat = 'dd/mm/yyyy'
    end
    object FloatField1: TFloatField
      FieldName = 'ITENS_PED_QUANTIDADE'
      Origin = 'BASE.ITENSPEDIDO.ITENS_PED_QUANTIDADE'
    end
    object FloatField2: TFloatField
      FieldName = 'ITENS_PED_QUANTIDADEATEN'
      Origin = 'BASE.ITENSPEDIDO.ITENS_PED_QUANTIDADEATEN'
    end
    object IntegerField2: TIntegerField
      FieldName = 'ITENS_PED_SITUACAO'
      Origin = 'BASE.ITENSPEDIDO.ITENS_PED_SITUACAO'
    end
  end
  object dsPedido: TDataSource
    DataSet = QPedido
    OnDataChange = dsPedidoDataChange
    Left = 720
    Top = 344
  end
  object PopupMenu2: TPopupMenu
    Left = 312
    Top = 288
    object LocalizarProduto1: TMenuItem
      Caption = 'Localizar Produto'
      ShortCut = 16454
      OnClick = LocalizarProduto1Click
    end
  end
end
